10 POKE53281,0:POKE53280,0
20 DV=PEEK(186):IFDV<8THENDV=8
30 PRINT"[147]"
50 D=4
60 PRINT"    [129][212][200][197] [205][201][199][200][212][217] [204][207][193][196][211][212][193][210] [198][207][206][212] [195][200][193][210][212][197][210]
62 [153]"  CHR$ET YOUR PRINTER READY AND PRESS
64 PRINT" [211][208][193][195][197] TO PRINT OUT A CHART OF THE 256
66 [153]" FONT CHARACTERS IN PRINT(null)LEN(null)VALVAL(null) LEN(null)STR$VAL ORDER.
68 PRINT"  [212]HE TOP CHARACTER IN EACH 'BOX' SHOWS
70 [153]" WHAT YOU'LL GET BY PRESSING THE KEY
72 PRINT" COMBINATION DIRECTLY BELOW IT.
74 [153]"  (null)HE TOP TWO TABLES ARE FOR THE UPPER-
76 PRINT" LOWERCASE FONT. [212]HE BOTTOM TWO ARE FOR
78 [153]" THE UPPERCASE-GRAPHICS FONT.
82 PRINT"  [153][211]- MEANS [211][200][201][198][212]. [153][195]- MEANS THE [195]= KEY.
84 [153]"   (null)(null)ATNLENVALCONT - (null)RINT THE LENHART (ONE SHEET)
86 PRINT"       [204][154] - [210]ETURN TO [204][207][193][196][211][212][193][210]
88 [151]198,0
90 [161]A$:[139]A$[178]""[167]90
92 [139]A$[178]" "[167]100
94 [139]A$[178]"L"[167]40000
96 [137]90
100 TP$[178]"ORTANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN=TANTANTAN^
110 MD$="[171][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][219][192][192][192][179]
120 BT$[178]"/TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTAN>TANTANTANEXP
130 BL$="[221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]   [221]
140 T$[178]"        "
200 [159]4,D,7
202 [152]4,[199](27)[199](65)[199](7):[143] SET LINE SPACING TO 7/72 INCH
210 [152]4,T$TP$
212 [152]4,T$BL$
220 [152]4,T$"(null) @ (null) A (null) B (null) C (null) D (null) E (null) F (null) G (null) H (null) I (null) J (null) K (null) L (null) M (null) N (null) O (null)
222 PRINT#4,T$BL$
230 PRINT#4,T$"[221] @ [221] [193] [221] [194] [221] [195] [221] [196] [221] [197] [221] [198] [221] [199] [221] [200] [221] [201] [221] [202] [221] [203] [221] [204] [221] [205] [221] [206] [221] [207] [221]
232 [152]4,T$BL$
240 [152]4,T$MD$
242 [152]4,T$BL$
250 [152]4,T$"(null)(null)(null)LEN(null) ! (null) "[199](34)" (null) # (null) $ (null) % (null) & (null) ' (null) ( (null) ) (null) * (null)";
252 [152]4," + (null) , (null) - (null) . (null) / (null)"
254 [152]4,T$BL$
260 [152]4,T$"(null)(null)(null)LEN(null)(null)-1(null)(null)-2(null)(null)-3(null)(null)-4(null)(null)-5(null)(null)-6(null)(null)-7(null)(null)-8(null)(null)-9(null) * (null)";
262 [152]4," + (null) , (null) - (null) . (null) / (null)"
264 [152]4,T$BL$
270 [152]4,T$MD$
272 [152]4,T$BL$
280 [152]4,T$"(null) TAN (null) ATN (null) PEEK (null) LEN (null) STR$ (null) VAL (null) ASC (null) CHR$ (null) LEFT$ (null) RIGHT$ (null) MID$ (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null)
282 PRINT#4,T$BL$
290 PRINT#4,T$"[221][211]-*[221][211]-[193][221][211]-[194][221][211]-[195][221][211]-[196][221][211]-[197][221][211]-[198][221][211]-[199][221][211]-[200][221][211]-[201][221][211]-[202][221][211]-[203][221][211]-[204][221][211]-[205][221][211]-[206][221][211]-[207][221]
292 [152]4,T$BL$
300 [152]4,T$MD$
302 [152]4,T$BL$
310 [152]4,T$"(null)   (null) GET (null) NEW (null) TAB( (null) TO (null) FN (null) SPC( (null) THEN (null) NOT (null) STEP (null) + (null) - (null) * (null) / (null) ^ (null) AND (null)
312 PRINT#4,T$BL$
320 PRINT#4,T$"[221][211][208][195][221][195]-[203][221][195]-[201][221][195]-[212][221][195]-@[221][195]-[199][221][195]-+[221][195]-[205][221][195]-\[221][211]-\[221][195]-[206][221][195]-[209][221][195]-[196][221][195]-[218][221][195]-[211][221][195]-[208][221]
322 [152]4,T$BL$
330 [152]4,T$BT$
340 [152]4:[152]4
400 [152]4,T$TP$
402 [152]4,T$BL$
410 [152]4,T$"(null) P (null) Q (null) R (null) S (null) T (null) U (null) V (null) W (null) X (null) Y (null) Z (null) [ (null) \ (null) ] (null) ^ (null) _ (null)
412 PRINT#4,T$BL$
420 PRINT#4,T$"[221] [208] [221] [209] [221] [210] [221] [211] [221] [212] [221] [213] [221] [214] [221] [215] [221] [216] [221] [217] [221] [218] [221] [ [221] \ [221] ] [221] ^ [221] _ [221]
422 [152]4,T$BL$
430 [152]4,T$MD$
432 [152]4,T$BL$
440 [152]4,T$"(null) 0 (null) 1 (null) 2 (null) 3 (null) 4 (null) 5 (null) 6 (null) 7 (null) 8 (null) 9 (null) : (null) ; (null) < (null) = (null) > (null) ? (null)
442 PRINT#4,T$BL$
450 PRINT#4,T$"[221] 0 [221] 1 [221] 2 [221] 3 [221] 4 [221] 5 [221] 6 [221] 7 [221] 8 [221] 9 [221] : [221] ; [221][211]-,[221] = [221][211]-.[221][211]-/[221]
452 [152]4,T$BL$
460 [152]4,T$MD$
462 [152]4,T$BL$
470 [152]4,T$"(null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null)
472 PRINT#4,T$BL$
480 PRINT#4,T$"[221][211]-[208][221][211]-[209][221][211]-[210][221][211]-[211][221][211]-[212][221][211]-[213][221][211]-[214][221][211]-[215][221][211]-[216][221][211]-[217][221][211]-[218][221][211]-+[221][195]--[221][211]--[221][211]-^[221][195]-*[221]
482 [152]4,T$BL$
490 [152]4,T$MD$
492 [152]4,T$BL$
500 [152]4,T$"(null) OR (null) > (null) = (null) < (null) SGN (null) INT (null) ABS (null) USR (null) FRE (null) POS (null) SQR (null) RND (null) LOG (null) EXP (null) COS (null) SIN (null)
502 PRINT#4,T$BL$
510 PRINT#4,T$"[221][195]-[193][221][195]-[197][221][195]-[210][221][195]-[215][221][195]-[200][221][195]-[202][221][195]-[204][221][195]-[217][221][195]-[213][221][195]-[207][221][211]-@[221][195]-[198][221][195]-[195][221][195]-[216][221][195]-[214][221][195]-[194][221]
512 [152]4,T$BL$
520 [152]4,T$BT$
530 [152]4:[152]4
600 [160]4
602 [159]4,D,0
610 [152]4,T$TP$
612 [152]4,T$BL$
620 [152]4,T$"(null) @ (null) A (null) B (null) C (null) D (null) E (null) F (null) G (null) H (null) I (null) J (null) K (null) L (null) M (null) N (null) O (null)
622 PRINT#4,T$BL$
630 PRINT#4,T$"[221] @ [221] A [221] B [221] C [221] D [221] E [221] F [221] G [221] H [221] I [221] J [221] K [221] L [221] M [221] N [221] O [221]
632 [152]4,T$BL$
640 [152]4,T$MD$
642 [152]4,T$BL$
650 [152]4,T$"(null)SPC(null) ! (null) "[199](34)" (null) # (null) $ (null) % (null) & (null) ' (null) ( (null) ) (null) * (null)";
652 [152]4," + (null) , (null) - (null) . (null) / (null)"
654 [152]4,T$BL$
660 [152]4,T$"(null)SPC(null)S-1(null)S-2(null)S-3(null)S-4(null)S-5(null)S-6(null)S-7(null)S-8(null)S-9(null) * (null)";
662 [152]4," + (null) , (null) - (null) . (null) / (null)"
664 [152]4,T$BL$
670 [152]4,T$MD$
672 [152]4,T$BL$
680 [152]4,T$"(null) TAN (null) ATN (null) PEEK (null) LEN (null) STR$ (null) VAL (null) ASC (null) CHR$ (null) LEFT$ (null) RIGHT$ (null) MID$ (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null)
682 PRINT#4,T$BL$
690 PRINT#4,T$"[221]S-*[221]S-A[221]S-B[221]S-C[221]S-D[221]S-E[221]S-F[221]S-G[221]S-H[221]S-I[221]S-J[221]S-K[221]S-L[221]S-M[221]S-N[221]S-O[221]
692 [152]4,T$BL$
700 [152]4,T$MD$
702 [152]4,T$BL$
710 [152]4,T$"(null)   (null) GET (null) NEW (null) TAB( (null) TO (null) FN (null) SPC( (null) THEN (null) NOT (null) STEP (null) + (null) - (null) * (null) / (null) ^ (null) AND (null)
712 PRINT#4,T$BL$
720 PRINT#4,T$"[221]SPC[221]C-K[221]C-I[221]C-T[221]C-@[221]C-G[221]C-+[221]C-M[221]C-\[221]S-\[221]C-N[221]C-Q[221]C-D[221]C-Z[221]C-S[221]C-P[221]
722 [152]4,T$BL$
730 [152]4,T$BT$
740 [152]4:[152]4
800 [152]4,T$TP$
802 [152]4,T$BL$
810 [152]4,T$"(null) P (null) Q (null) R (null) S (null) T (null) U (null) V (null) W (null) X (null) Y (null) Z (null) [ (null) \ (null) ] (null) ^ (null) _ (null)
812 PRINT#4,T$BL$
820 PRINT#4,T$"[221] P [221] Q [221] R [221] S [221] T [221] U [221] V [221] W [221] X [221] Y [221] Z [221] [ [221] \ [221] ] [221] ^ [221] _ [221]
822 [152]4,T$BL$
830 [152]4,T$MD$
832 [152]4,T$BL$
840 [152]4,T$"(null) 0 (null) 1 (null) 2 (null) 3 (null) 4 (null) 5 (null) 6 (null) 7 (null) 8 (null) 9 (null) : (null) ; (null) < (null) = (null) > (null) ? (null)
842 PRINT#4,T$BL$
850 PRINT#4,T$"[221] 0 [221] 1 [221] 2 [221] 3 [221] 4 [221] 5 [221] 6 [221] 7 [221] 8 [221] 9 [221] : [221] ; [221]S-,[221] = [221]S-.[221]S-/[221]
852 [152]4,T$BL$
860 [152]4,T$MD$
862 [152]4,T$BL$
870 [152]4,T$"(null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null) (null)
872 PRINT#4,T$BL$
880 PRINT#4,T$"[221]S-P[221]S-Q[221]S-R[221]S-S[221]S-T[221]S-U[221]S-V[221]S-W[221]S-X[221]S-Y[221]S-Z[221]S-+[221]C--[221]S--[221]S-^[221]C-*[221]
882 [152]4,T$BL$
890 [152]4,T$MD$
892 [152]4,T$BL$
900 [152]4,T$"(null) OR (null) > (null) = (null) < (null) SGN (null) INT (null) ABS (null) USR (null) FRE (null) POS (null) SQR (null) RND (null) LOG (null) EXP (null) COS (null) SIN (null)
902 PRINT#4,T$BL$
910 PRINT#4,T$"[221]C-A[221]C-E[221]C-R[221]C-W[221]C-H[221]C-J[221]C-L[221]C-Y[221]C-U[221]C-O[221]C-@[221]C-F[221]C-C[221]C-X[221]C-V[221]C-B[221]
912 [152]4,T$BL$
920 [152]4,T$BT$
930 [152]4,[199](27)[199](64)
940 [138]
10000 D[178][194](186):N$[178]"B.FONT CHART":[159]15,D,15,"S0:"[170]N$:[160]15:[148]N$,D:[128]
40000 [129]I[178]8[164]29:[151]820[170]I,I:[130]:[139]DV[177]8[175]DV[179]30[167][151]828,DV:[151]820[170]DV,8
40010 A$[178]"PRESENTER":[141]40030:A$[178]"HELLO CONNECT":[141]40030
40020 [153]"LOAD":[151]53272,23:[151]186,8:[151]2048,0:[151]44,8:[151]43,1:[128]
40030 [129]J[178]8[164]29:I[178][194](820[170]J):[139]I[178]14[167][130]
40040 [160]2:[159]2,I,2:[160]2:[139]ST[167]40060
40050 [160]15:[159]15,I,15,"R0:"[170]A$[170]"="[170]A$:[132]15,ER:[160]15:[139]ER[178]63[167]40070
40060 [130]:[142]
40070 A$[178]"HELLO CONNECT":Q$[178][199](34):[151]646,[194](53281):[153]"LOAD":[151]53272,23
40080 [153]"LOADP(null)2048,0:P(null)44,8:P(null)43,1:P(null)56,160:P(null)55,0:CLR:L(null)"Q$A$Q$","I
40090 [153]"RUN:":[151]631,13:[151]632,13:[151]198,2:[128]